home *** CD-ROM | disk | FTP | other *** search
/ Softwarová Záchrana 3 / Softwarova-zachrana-3.bin / Xteq X-Setup / xqdcXSP-Setup-EN.exe / {app} / plugins / XQ New File Menu Enable.xpl < prev    next >
Text File  |  2001-10-18  |  2KB  |  45 lines
  1. "FILE"="Xteq Systems X-Setup Plugin 5.0"
  2. "TYPE"="6"
  3. "COUNT"="1"
  4. "UIPATH"="Appearance\Files&Folders\"New" Context Menu"
  5. "NAME"="Enable "New" Context Menu"
  6. "LANGUAGE"="VBScript"
  7. "TEXT 1"="Enable "New" Context Menu"
  8. "DESCRIPTION 1"="When you right-click an empty space in Windows Explorer or on the Desktop, you'll see a sub-menu called 'New' which lets you create a new document in that folder."
  9. "DESCRIPTION 2"="If you wish to disable this menu, you can clear the tick in the box. To re-enable it, add a tick in the box."
  10. "DESCRIPTION 3"="NOTE: Disabling the New menu requires Windows 98/2000/Me/XP or Windows 95 with the Windows Desktop Update installed."
  11. "COMMENT 1"="Tip found on WinGuides.com Registry Guide."
  12. "VERSION"="1.01"
  13. "AUTHOR"="Xteq Systems (Neil R. Turner)"
  14. "COPYRIGHT"="Copyright ⌐ Xteq Systems - All Rights Reserved"
  15.  
  16. 'Declaration of some constants
  17. sP="HKCR\Directory\Background\shellex\ContextMenuHandlers\New\@"
  18.  
  19. 'Called when the Plugin is started
  20. SUB Plugin_Initialize
  21. s=RegReadValue(sP)
  22. if s="{D969A300-E7FF-11d0-A93B-00A0C90F2719}" then
  23.   Call SetUIElement(1,true)
  24. end if
  25. END SUB
  26.  
  27. 'Called when the Plugin should validate the Data the user has entered
  28. SUB Plugin_CheckData(ElementIndex)
  29. END SUB
  30.  
  31. 'Called when the Plugin should apply the changes
  32. SUB Plugin_Apply(ElementIndex,ElementSubIndex)
  33. s=GetUIElement(1)
  34. if s=true then
  35.   Call RegWriteValue(sP,"{D969A300-E7FF-11d0-A93B-00A0C90F2719}",1)
  36. else
  37.   Call RegWriteValue(sP,"",1)
  38. end if
  39. END SUB
  40.  
  41. 'Called when the Plugin is about to be removed from memory
  42. SUB Plugin_Terminate
  43. END SUB
  44.  
  45.